home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / bin / metasend < prev    next >
Encoding:
Text File  |  1995-07-03  |  5.3 KB  |  240 lines
  1. :
  2. # Copyright (c) 1991 Bell Communications Research, Inc. (Bellcore)
  3. # 
  4. # Permission to use, copy, modify, and distribute this material 
  5. # for any purpose and without fee is hereby granted, provided 
  6. # that the above copyright notice and this permission notice 
  7. # appear in all copies, and that the name of Bellcore not be 
  8. # used in advertising or publicity pertaining to this 
  9. # material without the specific, prior written permission 
  10. # of an authorized representative of Bellcore.  BELLCORE 
  11. # MAKES NO REPRESENTATIONS ABOUT THE ACCURACY OR SUITABILITY 
  12. # OF THIS MATERIAL FOR ANY PURPOSE.  IT IS PROVIDED "AS IS", 
  13. # WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES.
  14.  
  15. # Conversion from C shell to Bourne shell by Z-Code Software Corp.
  16. # Conversion Copyright (c) 1992 Z-Code Software Corp.
  17. # Permission to use, copy, modify, and distribute this material
  18. # for any purpose and without fee is hereby granted, provided
  19. # that the above copyright notice and this permission notice
  20. # appear in all copies, and that the name of Z-Code Software not
  21. # be used in advertising or publicity pertaining to this
  22. # material without the specific, prior written permission
  23. # of an authorized representative of Z-Code.  Z-CODE SOFTWARE
  24. # MAKES NO REPRESENTATIONS ABOUT THE ACCURACY OR SUITABILITY
  25. # OF THIS MATERIAL FOR ANY PURPOSE.  IT IS PROVIDED "AS IS",
  26. # WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES.
  27.  
  28. if [ -z "$METAMAIL_TMPDIR" ]
  29. then METAMAIL_TMPDIR=/tmp
  30. fi
  31.  
  32. MustDelete=0
  33. batchmode=0
  34. splitsize=100000
  35.  
  36. while test ! -z "$*"
  37. do
  38.     case $1 in
  39.         -S) shift
  40.             if test -z "$*"
  41.             then
  42.             echo "-S requires a following argument, the SPLIT threshhold"
  43.             exit 1
  44.             fi
  45.             splitsize=$1
  46.             shift ;;
  47.  
  48.         -b) batchmode=1
  49.             shift ;;
  50.  
  51.         -c) shift
  52.             if test -z "$*"
  53.             then
  54.                 echo "-c requires a following argument, the CC address"
  55.             exit 1
  56.             fi
  57.             cc=$1
  58.             shift ;;
  59.  
  60.         -s) shift
  61.             if test -z "$*"
  62.             then
  63.             echo "-s requires a following argument, the SUBJECT"
  64.             exit 1
  65.             fi
  66.             subject=$1
  67.             shift ;;
  68.  
  69.         -t) shift
  70.             if test -z "$*"
  71.             then
  72.             echo "-t requires a following argument, the TO address"
  73.             exit 1
  74.             fi
  75.             to=$1
  76.             shift ;;
  77.  
  78.         -e) shift
  79.             if test -z "$*"
  80.             then
  81.             echo "-e requires a following argument, the ENCODING value"
  82.             exit 1
  83.             fi
  84.             encode=$1
  85.             shift ;;
  86.  
  87.         -f) shift
  88.             if test -z "$*"
  89.             then
  90.             echo "-f requires a following argument, the DATA FILE"
  91.             exit 1
  92.             fi
  93.             datafile=$1
  94.             shift ;;
  95.  
  96.         -m) shift
  97.             if test -z "$*"
  98.             then
  99.             echo "-m requires a following argument, the MIME CONTENT-TYPE"
  100.             exit 1
  101.             fi
  102.             ctype=$1
  103.             shift ;;
  104.  
  105.         -z) MustDelete=1
  106.             shift ;;
  107.  
  108.         *) echo UNRECOGNIZED METASEND OPTION: $1
  109.            exit 1 ;;
  110.     esac
  111. done
  112.  
  113. if test $batchmode -eq 0
  114. then
  115.     if test -z "${to:-}"
  116.     then
  117.         echo-n "To: "
  118.         read to
  119.     fi
  120.     if test -z "${subject:-}"
  121.     then
  122.             echo-n "Subject: "
  123.         read subject
  124.     fi
  125.     if test -z "${cc:-}"
  126.     then
  127.         echo-n "CC: "
  128.         read cc
  129.     fi
  130.     if test -z "${ctype:-}"
  131.     then
  132.             echo-n "Content-type: "
  133.         read ctype
  134.     fi
  135.     if test -z "${datafile:-}"
  136.     then
  137.         looping=1
  138.         while test $looping -eq 1
  139.         do
  140.             echo-n "Name of file containing $ctype data: "
  141.             read datafile
  142.             if test -r "$datafile"
  143.             then
  144.                 looping=0
  145.             else
  146.                 echo "The file $datafile does not exist."
  147.             fi
  148.         done
  149.     fi
  150.  
  151.     if test -z "${encode:-}"
  152.     then
  153.         looping=1
  154.         while test $looping -eq 1
  155.         do
  156.             echo "Do you want to encode this data for sending through the mail?"
  157.             echo "  1 -- No, it is already in 7 bit ASCII"
  158.             echo "  2 -- Yes, encode in base64 (most efficient)"
  159.             echo "  3 -- Yes, encode in quoted-printable (less efficient, more readable)"
  160.             echo "  4 -- Yes, encode it using uuencode (not standard, being phased out)"
  161.             read encode
  162.             looping=0
  163.             case "$encode" in
  164.                 1) encodingprog=cat
  165.                    encode=7bit ;;
  166.                 2) encodingprog="mimencode -b"
  167.                    encode=base64 ;;
  168.                 3) encodingprog="mimencode -q"
  169.                    encode=quoted-printable ;;
  170.                 4) encodingprog="uuencode $datafile"
  171.                    encode=x-uue ;;
  172.                 *) echo Unrecognized answer, please try again.
  173.                    looping=1 ;;
  174.             esac
  175.         done
  176.     fi
  177. else
  178.     if test -z "${to:-}" \
  179.         -o -z "${subject:-}" \
  180.         -o -z "${ctype:-}" \
  181.         -o -z "${datafile:-}"
  182.     then
  183.         echo "metasend: in batch mode, -t, -s, -f, and -m are all required"
  184.         exit 1
  185.     fi
  186.  
  187.     if test ! -r "$datafile"
  188.     then
  189.         echo "metasend: The file $datafile does not exist"
  190.         exit 1
  191.     fi
  192.  
  193.     if test -z "${cc:-}"
  194.     then
  195.         cc=''
  196.     fi
  197.  
  198.     if test -z "${encode:-}"
  199.     then
  200.         case "$ctype" in
  201.             text*) encodingprog="mimencode -q"
  202.                    encode=quoted-printable ;;
  203.             *) encodingprog="mimencode -b"
  204.                encode=base64 ;;
  205.         esac
  206.     else
  207.         case "$encode" in
  208.             base64) encodingprog="mimencode -b" ;;
  209.             x-uue) encodingprog="uuencode $datafile" ;;
  210.             *) encodingprog="mimencode -q"
  211.                encode=quoted-printable ;;
  212.         esac
  213.     fi
  214. fi
  215.  
  216. fname=$METAMAIL_TMPDIR/metasend.$$
  217. echo "To: $to" > $fname
  218. echo "Subject: $subject" >> $fname
  219. echo "CC: $cc" >> $fname
  220. echo "MIME-Version: 1.0" >> $fname
  221. echo "Content-type: $ctype" >> $fname
  222. echo "Content-Transfer-Encoding: $encode" >> $fname
  223. echo "" >> $fname
  224. "$encodingprog" < "$datafile" >> "$fname"
  225. # Ensure last line has trailing carriage return
  226. echo "" >> "$fname"
  227.  
  228. splitmail -s $splitsize -d $fname
  229.  
  230. if test $? -eq 0
  231. then
  232.     rm -f $fname
  233. elif test "$MustDelete" -eq 1
  234. then
  235.     echo Mail delivery failed
  236.     rm -f $fname
  237. else
  238.     echo "Mail delivery failed, draft mail is in $fname"
  239. fi
  240.